init x = 5;

clear y;
while y not 0 do;
	incr x;
	decr y;
end;
